| InitTree method |
Applies to
TDUnitDialog
Declaration
Procedure InitTree;
Implementation
procedure TDUnitDialog.InitTree;
begin
FillTestTree(FSuite);
Setup;
if HideTestNodesOnOpenAction.Checked then
HideTestNodesAction.Execute
else
ExpandAllNodesAction.Execute;
TestTree.Selected := TestTree.Items.GetFirstNode;
End; |
|
|